home *** CD-ROM | disk | FTP | other *** search
/ Just Call Me Internet / Just Call Me Internet.iso / com / computer / mx2net20 / network.def < prev    next >
Encoding:
Modula Definition  |  1990-12-15  |  1.5 KB  |  39 lines
  1.  
  2. (*              Copyright 1987 fred brooks LogicTek             *)
  3. (*                                                              *)
  4. (*                                                              *)
  5. (*   First Release                      12/8/87-FGB             *)
  6. (* Added support for use of MIDI or AUX port for network        *)
  7. (*                                      2/6/88-FGB              *)
  8. (*                                                              *)
  9.  
  10. DEFINITION MODULE NETWORK;
  11. FROM        BIOS    IMPORT    Device;
  12.  
  13. TYPE
  14.   stat        = RECORD
  15.                  inpackets      :       LONGCARD;
  16.                  outpackets     :       LONGCARD;
  17.                  retrys         :       LONGCARD;
  18.                  checksumerrors :       LONGCARD;
  19.                  timeouts       :       LONGCARD;
  20.                  rwabsreqs      :       LONGCARD;
  21.                  resets         :       LONGCARD;
  22.                 END;
  23.  
  24. VAR     netdevice               :   Device;
  25.         NETTIME                 :   BOOLEAN;
  26.         NETMASK                 :   BOOLEAN;
  27.         MEMMASK                 :   BOOLEAN;
  28.         PHYSLOW                 :   BOOLEAN;
  29.  
  30. PROCEDURE       initnetwork(port: Device);
  31. (* install network, default is network on ,MIDI port *)
  32. PROCEDURE       recframe;    (* check network for received data *)
  33. PROCEDURE       NoCritrecframe;    (* check network for received data *)
  34. PROCEDURE       networkoff;  (* turn on network *)
  35. PROCEDURE       networkon;   (* turn off network *)
  36. PROCEDURE       GetOpt;
  37.  
  38. END  NETWORK.
  39.